--POUR CONTROLE


define erp='erp_mli2.';
define outils='outils_mli2.';




/*SELECT &outils.stragg(source) source,fournisseur_cod, origprosp_cod, prfweb_cod, activite_cod, effectif_nb, webacces, webmdp, fourdivers_ok, fraisportcee_coef, poidsmini_val, poidsmaxi_val, volumemini_val, volumemaxi_val, rubrique_1_lib, rubrique_2_lib, rubrique_3_lib, rubrique_4_lib, rubrique_5_lib, rubrique_6_lib, traitgeneetiq_typ, condtrp_cod, fourgroup_cod, lieutrp_cod, modetrp_cod, exped_cod, enreg_id, nomen_cod, prfrelance_cod, remise_cod, enreg_s, aff_nom
FROM (
  SELECT 'uv' source ,g.* FROM se_ACH_FOURNISSEUR g
  UNION ALL
  SELECT 'se' source ,g.* FROM &erp.ach_fournisseur g
  )
GROUP BY fournisseur_cod, origprosp_cod, prfweb_cod, activite_cod, effectif_nb, webacces, webmdp, fourdivers_ok, fraisportcee_coef, poidsmini_val, poidsmaxi_val, volumemini_val, volumemaxi_val, rubrique_1_lib, rubrique_2_lib, rubrique_3_lib, rubrique_4_lib, rubrique_5_lib, rubrique_6_lib, traitgeneetiq_typ, condtrp_cod, fourgroup_cod, lieutrp_cod, modetrp_cod, exped_cod, enreg_id, nomen_cod, prfrelance_cod, remise_cod, enreg_s, aff_nom
HAVING Count(1)!=2
ORDER BY fournisseur_cod*/

DELETE FROM  se_ACH_FOURNISSEUR ;

--SELECT * FROM &erp.ACH_FOURNISSEUR where fournisseur_cod not in(select fournisseur_cod from &erp.ach_foursoc)
--SELECT * FROM uv_pfournisseurs
--select *  from se_ACH_FOURNISSEUR
--select * from &erp.ach_foursoc


INSERT INTO se_ACH_FOURNISSEUR
 (SELECT id fournisseur_cod,
         NULL origprosp_cod,
         NULL prfweb_cod,
         activite activite_cod,
         NULL effectif_nb,
         NULL webacces,
         NULL webmdp,
         'N' fourdivers_ok,
         FRAISCEE/100 fraisportcee_coef,
         NULL poidsmini_val,
         NULL poidsmaxi_val,
         NULL volumemini_val,
         NULL volumemaxi_val,
         CPTAF rubrique_1_lib,
         NULL rubrique_2_lib,
         NULL rubrique_3_lib,
         NULL rubrique_4_lib,
         NULL rubrique_5_lib,
         NULL rubrique_6_lib,
         NULL traitgeneetiq_typ,
         Decode(port,'F','FCA','P',null,port) condtrp_cod,
         Decode(GROUPEMENT,id,NULL,GROUPEMENT) fourgroup_cod,
         NULL lieutrp_cod,
         NULL modetrp_cod,
         NULL exped_cod,
         0 enreg_id,
         NULL nomen_cod,
         'DEFAUT' prfrelance_cod,
         NULL remise_cod,
         'N' enreg_s,
         Trim(SubStr(nom ||' ' || CP ||' ' || ville  ||' ' || adr1 ||' ' || adr2,0,80))aff_nom
    FROM uv_pfournisseurs fuv) ;

 UPDATE se_ACH_FOURNISSEUR tf
 SET enreg_id = (select enreg_id FROM &erp.ach_fournisseur f WHERE f.fournisseur_cod=tf.fournisseur_cod )
 WHERE EXISTS (SELECT 1 FROM &erp.ach_fournisseur f WHERE f.fournisseur_cod=tf.fournisseur_cod);

 UPDATE se_ACH_FOURNISSEUR SET enreg_id=&outils.enreg_id.NEXTVAL WHERE enreg_id IS NULL OR enreg_id =0;


commit;





